/*
 * Copyright (c) 2014 pkzd/1.0, 颜文泽(robin)
 * All rights reserved.
 * Redistribution and use in source and binary forms, with or without
 * modification, are permitted provided that the following conditions are met:
 *
 *     1 Redistributions of source code must retain the above copyright
 *       notice, this list of conditions and the following disclaimer.
 *     2 Redistributions in binary form must reproduce the above copyright
 *       notice, this list of conditions and the following disclaimer in the
 *       documentation and/or other materials provided with the distribution.
 *
 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS "AS IS" AND ANY
 * EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED
 * WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE
 * DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE FOR ANY
 * DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES
 * (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES;
 * LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND
 * ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
 * SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
 */

#include	<asm.h>
#include	<pic.h>
#include	<sig.h>
#include	<time.h>
#include	<proc.h>
#include	<param.h>

uint	ticks;

void
clk_init(void)
{
	ticks = 0;
	outb(0x36, 0x43);
        outb((1193182 / 100) & 0xff, 0x40);
        outb(((1193182 / 100) >> 8) & 0xff, 0x40);
	pic_eblirq(CLK_IRQ);
}

void
clkint(void)
{
	struct proc *p;

	ticks++;
	up->p_cpu++;
	if(pagecnt < pagettl){ 
		for(p = &proc[0]; p < &proc[NPROC]; p++){
			if(p == up || p->p_flag & SSYS || !(p->p_flag & SLOAD) || p->p_stat == SFREE)
				continue;
			if(!(p->p_stat & (SZOMB | SIDL)) && p->p_time >= PROCTIME)
				swap(p);
			if(pagecnt > (pagettl * 2)) 
				break;
		}
	}
	if(!(ticks % SECTICKS)){
		stime++;
		up->p_cpu /= 2;
		setpri(up);
                for(p = &proc[0]; p < &proc[NPROC]; p++){
                        if(p != up && p->p_stat & (SRUN | SREADY)){
                                p->p_cpu /= 2;
                                setpri(p);
                        }
                        if(p->p_stat && ~(p->p_stat & (SIDL | SZOMB)))
                                p->p_time++;
                }
        }
}
